home *** CD-ROM | disk | FTP | other *** search
/ Delphi Magazine Collection 2001 / Delphi Magazine Collection 20001 (2001).iso / DISKS / Issue37 / outlook / mapi / ExchExt.pas next >
Encoding:
Pascal/Delphi Source File  |  1998-04-30  |  16.5 KB  |  576 lines
  1. { Created: 1997-10-15 by Berend
  2.  
  3. Translation of exchext.h, converted by hand, but using
  4. htrans 0.3.4 for certain pieces.
  5.  
  6.  
  7. $History$
  8.  
  9. }
  10.  
  11.  
  12. unit ExchExt;
  13.  
  14. interface
  15.  
  16. uses
  17.   Windows,
  18.   CommCtrl,
  19.   MapiDefs, MapiX, MapiForm;
  20.  
  21.  
  22. type
  23.   LPTSTR = PChar;
  24.   HINSTANCE = integer;
  25.   LPMDB = pointer;
  26.  
  27. (*
  28.  *  C o n s t a n t s
  29.  *)
  30.  
  31.   // SCODEs
  32.  
  33. const
  34. (*
  35.   EXCHEXT_S_NOCRITERIA = MAKE_SCODE(SEVERITY_SUCCESS, FACILITY_ITF, 1);
  36.   EXCHEXT_S_NOCHANGE = MAKE_SCODE(SEVERITY_SUCCESS, FACILITY_ITF, 2);
  37. *)
  38.  
  39.     // Flag for Unicode strings
  40.   EXCHEXT_UNICODE = ($80000000);
  41.     // Flag values for IExchExtCallback::GetVersion
  42.   EECBGV_GETBUILDVERSION = ($00000001);
  43.   EECBGV_GETACTUALVERSION = ($00000002);
  44.   EECBGV_GETVIRTUALVERSION = ($00000004);
  45.     // Build version value for IExchExtCallback::GetVersion
  46.   EECBGV_BUILDVERSION_MAJOR = ($000d0000);
  47.   EECBGV_BUILDVERSION_MAJOR_MASK = ($FFFF0000);
  48.   EECBGV_BUILDVERSION_MINOR_MASK = ($0000FFFF);
  49.     // Actual/Virtual version values for IExchExtCallback::GetVersion
  50.   EECBGV_MSEXCHANGE_WIN31 = ($01010000);
  51.   EECBGV_MSEXCHANGE_WIN95 = ($01020000);
  52.   EECBGV_MSEXCHANGE_WINNT = ($01030000);
  53.   EECBGV_MSEXCHANGE_MAC = ($01040000);
  54.   EECBGV_VERSION_PRODUCT_MASK = ($FF000000);
  55.   EECBGV_VERSION_PLATFORM_MASK = ($00FF0000);
  56.   EECBGV_VERSION_MAJOR_MASK = ($0000FF00);
  57.   EECBGV_VERSION_MINOR_MASK = ($000000FF);
  58.     // Flag values for IExchExtCallback::GetMenuPos
  59.   EECBGMP_RANGE = ($00000001);
  60.     // Flag values for IExchExtCallback::GetNewMessageSite
  61.   EECBGNMS_MODAL = ($00000001);
  62.     // Flag values for IExchExtCallback::ChooseFolder
  63.   EECBCF_GETNAME = ($00000001);
  64.   EECBCF_HIDENEW = ($00000002);
  65.   EECBCF_PREVENTROOT = ($00000004);
  66.     // Extensibility contexts used with IExchExt::Install
  67.   EECONTEXT_SESSION = ($00000001);
  68.   EECONTEXT_VIEWER = ($00000002);
  69.   EECONTEXT_REMOTEVIEWER = ($00000003);
  70.   EECONTEXT_SEARCHVIEWER = ($00000004);
  71.   EECONTEXT_ADDRBOOK = ($00000005);
  72.   EECONTEXT_SENDNOTEMESSAGE = ($00000006);
  73.   EECONTEXT_READNOTEMESSAGE = ($00000007);
  74.   EECONTEXT_SENDPOSTMESSAGE = ($00000008);
  75.   EECONTEXT_READPOSTMESSAGE = ($00000009);
  76.   EECONTEXT_READREPORTMESSAGE = ($0000000A);
  77.   EECONTEXT_SENDRESENDMESSAGE = ($0000000);
  78.   EECONTEXT_PROPERTYSHEETS = ($0000000C);
  79.   EECONTEXT_ADVANCEDCRITERIA = ($0000000D);
  80.   EECONTEXT_TASK = ($0000000E);
  81.     // Flag values for IExchExt::Install
  82.   EE_MODAL = ($00000001);
  83.     // Toolbar ids used with IExchExtCommands::InstallCommands
  84.   EETBID_STANDARD = ($00000001);
  85.     // Flag values for IExchExtCommands::QueryHelpText
  86.   EECQHT_STATUS = ($00000001);
  87.   EECQHT_TOOLTIP = ($00000002);
  88.     // Flag values for IExchExtMessageEvents::OnXComplete
  89.   EEME_FAILED = ($00000001);
  90.   EEME_COMPLETE_FAILED = ($00000002);
  91.     // Flag values for IExchExtAttachedFileEvents::OpenSzFile
  92.   EEAFE_OPEN = ($00000001);
  93.   EEAFE_PRINT = ($00000002);
  94.   EEAFE_QUICKVIEW = ($00000003);
  95.     // Flag values for IExchExtPropertySheets methods
  96.   EEPS_MESSAGE = ($00000001);
  97.   EEPS_FOLDER = ($00000002);
  98.   EEPS_STORE = ($00000003);
  99.   EEPS_TOOLSOPTIONS = ($00000004);
  100.     // Flag values for IExchExtAdvancedCriteria::Install and ::SetFolder
  101.   EEAC_INCLUDESUBFOLDERS = ($00000001);
  102.  
  103.  
  104. (*
  105.  *  S t r u c t u r e s
  106.  *)
  107.  
  108.   // Hook procedure for IExchExtCallback::ChooseFolder
  109.  
  110. type
  111.   LPEECFHOOKPROC_dummy = function (_noname1 : HWND; _noname2 : UINT;
  112.     _noname3 : WPARAM; _noname4 : LPARAM): HRESULT; stdcall;
  113.   LPEECFHOOKPROC = LPEECFHOOKPROC_dummy;
  114.  
  115.     // Dialog information for IExchExtCallback::ChooseFolder
  116.   PExchExtChooseFolder = ^TExchExtChooseFolder;
  117.   TExchExtChooseFolder = record
  118.       cbLength : UINT;
  119.       hwnd : HWND;
  120.       szCaption : LPTSTR;
  121.       szLabel : LPTSTR;
  122.       szHelpFile : LPTSTR;
  123.       ulHelpID : ULONG;
  124.       hinst : HINSTANCE;
  125.       uiDlgID : UINT;
  126.       lpeecfhp : LPEECFHOOKPROC;
  127.       dwHookData : DWORD;
  128.       ulFlags : ULONG;
  129.       pmdb : LPMDB;
  130.       pfld : IMAPIFOLDER;
  131.       szName : LPTSTR;
  132.       dwReserved1 : DWORD;
  133.       dwReserved2 : DWORD;
  134.       dwReserved3 : DWORD;
  135.     end;
  136.  
  137.     // Toolbar list entries for IExchExtCommands::InstallCommands
  138.   TBENTRY = record
  139.       hwnd : HWND;
  140.       tbid : ULONG;
  141.       ulFlags : ULONG;
  142.       itbbBase : UINT;
  143.     end;
  144.  
  145.   LPTBENTRY = ^TBENTRY;
  146.  
  147. (*
  148.  *  E x t e r n a l   T y p e s
  149.  *)
  150.  
  151. (*
  152.  *  S u p p o r t   I n t e r f a c e s
  153.  *)
  154.  
  155. type
  156.   IExchExtModelessCallback = interface;
  157.   IExchExtCallback = interface;
  158.   IExchExt = interface;
  159.   IExchExtModeless = interface;
  160.  
  161.  
  162.  
  163. (*
  164.  *  IExchExtModelessCallback
  165.  *
  166.  *  Purpose:
  167.  *      Interface which may be used by Exchange client
  168.  *      extensions that create modeless UI.
  169.  *)
  170.  IExchExtModelessCallback = interface(IUnknown)
  171.    ['{00020D1A-0000-0000-C000-000000000046}']
  172.  end;
  173.  
  174.  
  175. (*
  176.  *  IExchExtCallback
  177.  *
  178.  *  Purpose:
  179.  *      Resource interface that may be used by Exchange client extensions.
  180.  *)
  181.  
  182.   IExchExtCallback = interface(IUnknown)
  183.     ['{00020D10-0000-0000-C000-000000000046}']
  184.     function GetVersion(
  185.                var lpulVersion: ULONG;
  186.                ulFlags: ULONG): HResult; stdcall;
  187.     function GetWindow(
  188.                var hwnd: HWND): HResult; stdcall;
  189.     function GetMenu(
  190.                var hmenu: HMENU): HResult; stdcall;
  191.     function GetToolbar(
  192.                tbidl: ULONG ;
  193.                var hwndTb: HWND): HResult; stdcall;
  194.     function GetSession(
  195.                var pses: IMAPISESSION;
  196.                var pab: IADDRBOOK): HResult; stdcall;
  197.     function GetObject(
  198.                var lppmdb: LPMDB;
  199.                var lppmp: IMAPIPROP): HResult; stdcall;
  200.     function GetSelectionCount(
  201.                var lpceid: ULONG): HResult; stdcall;
  202.     function GetSelectionItem(
  203.                ieid: ULONG;
  204.                var lpcbEid: ULONG;
  205.                var lppeid: PENTRYID;
  206.                var lpulType: ULONG;
  207.                lpszMsgClass: LPTSTR;
  208.                cbMsgClass: ULONG;
  209.                var lpulMsgFlags: ULONG;
  210.                ulFlags: ULONG ): HResult; stdcall;
  211.     function GetMenuPos(
  212.                cmdid: ULONG;
  213.                var hmenu: HMENU;
  214.                lpmposMin: PULONG;
  215.                lpmposMax: PULONG;
  216.                ulFlags: ULONG): HResult; stdcall;
  217.     function GetSharedExtsDir(
  218.                lpszDir: LPTSTR;
  219.                cchDir: ULONG;
  220.                ulFlags: ULONG): HResult; stdcall;
  221.     function GetRecipients(
  222.                var lppal: PADRLIST): HResult; stdcall;
  223.     function SetRecipients(
  224.                lpal: PADRLIST): HResult; stdcall;
  225.     function GetNewMessageSite(
  226.                fComposeInFolder: ULONG;
  227.                pfldFocus: IMAPIFOLDER;
  228.                ppermsg: IPERSISTMESSAGE;
  229.                var ppmsg: IMESSAGE;
  230.                var ppmms: IMAPIMESSAGESITE;
  231.                var ppmvc: IMAPIVIEWCONTEXT;
  232.                ulFlags: ULONG): HResult; stdcall;
  233.     function RegisterModeless(
  234.               peem: IEXCHEXTMODELESS;
  235.               var ppeemcb: IEXCHEXTMODELESSCALLBACK): HResult; stdcall;
  236.     function ChooseFolder(
  237.                peecf: PEXCHEXTCHOOSEFOLDER): HResult; stdcall;
  238.   end;
  239.  
  240.  
  241.  
  242.  
  243. (*
  244.  *  E x t e n s i o n   I n t e r f a c e s
  245.  *)
  246.  
  247. {*
  248.  *  IExchExt
  249.  *
  250.  *  Purpose:
  251.  *      Central interface implemented by Exchange client extensions.
  252.  *}
  253.  
  254.   IExchExt = interface(IUnknown)
  255.     ['{00020D11-0000-0000-C000-000000000046}']
  256.     function Install(
  257.                eecb: IEXCHEXTCALLBACK;
  258.                mecontext: ULONG;
  259.                ulFlags: ULONG): HResult; stdcall;
  260.   end;
  261.  
  262.  
  263. (*
  264.  *  IExchExtCommands
  265.  *
  266.  *  Purpose:
  267.  *      Interface implemented by Exchange client extensions that wish to
  268.  *      add additional commands to the client's menus.
  269.  *)
  270.   IExchExtCommands = interface(IUnknown)
  271.     ['{00020D12-0000-0000-C000-000000000046}']
  272.     function InstallCommands(
  273.                eecb: IEXCHEXTCALLBACK;
  274.                hwnd: HWND;
  275.                hmenu: HMENU;
  276.                var cmdidBase: UINT;
  277.                lptbeArray: LPTBENTRY;
  278.                ctbe: UINT;
  279.                ulFlags: ULONG): HResult; stdcall;
  280.     procedure InitMenu(
  281.                 eecb: IExchExtCallback); stdcall;
  282.     function DoCommand(
  283.               eecb: IEXCHEXTCALLBACK;
  284.               cmdid: UINT): HResult; stdcall;
  285.     function Help(
  286.                eecb: IEXCHEXTCALLBACK;
  287.                cmdid: UINT): HResult; stdcall;
  288.     function QueryHelpText(
  289.                cmdid: UINT;
  290.                ulFlags: ULONG;
  291.                lpsz: LPTSTR;
  292.                cch: UINT): HResult; stdcall;
  293.     function QueryButtonInfo(
  294.                tbid: ULONG;
  295.                itbb: UINT;
  296.                ptbb: PTBButton;
  297.                lpsz: LPTSTR;
  298.                cch: UINT;
  299.                ulFlags: ULONG): HResult; stdcall;
  300.     function ResetToolbar(
  301.                tbid: ULONG;
  302.                ulFlags: ULONG): HResult; stdcall;
  303.   end;
  304.  
  305.  
  306. (*
  307.  *    IExchExtSessionEvents
  308.  *
  309.  *    Purpose:
  310.  *        Interface implemented by Exchange client extensions that wish to
  311.  *        take special action when certain events happen in the session.
  312.  *)
  313.   IExchExtSessionEvents = interface(IUnknown)
  314.     ['{00020D14-0000-0000-C000-000000000046}']
  315.     function OnDelivery(eecb: IEXCHEXTCALLBACK): HResult; stdcall;
  316.   end;
  317.  
  318.  
  319.  
  320. (*
  321.  *  IExchExtModeless
  322.  *
  323.  *  Purpose:
  324.  *      Interface implemented by Exchange client extensions that wish
  325.  *      to create modeless UI.
  326.  *)
  327.   IExchExtModeless = interface(IUnknown)
  328.     ['{00020D19-0000-0000-C000-000000000046}']
  329.   end;
  330.  
  331.  
  332. (*
  333.  *  G U I D s
  334.  *)
  335.  
  336. const
  337.   IID_IExchExtCallback: TGUID =           '{00020D10-0000-0000-C000-000000000046}';
  338.   IID_IExchExt: TGUID =                   '{00020D11-0000-0000-C000-000000000046}';
  339.   IID_IExchExtCommands: TGUID =           '{00020D12-0000-0000-C000-000000000046}';
  340.   IID_IExchExtUserEvents: TGUID =         '{00020D13-0000-0000-C000-000000000046}';
  341.   IID_IExchExtSessionEvents: TGUID =      '{00020D14-0000-0000-C000-000000000046}';
  342.   IID_IExchExtMessageEvents: TGUID =      '{00020D15-0000-0000-C000-000000000046}';
  343.   IID_IExchExtAttachedFileEvents: TGUID = '{00020D16-0000-0000-C000-000000000046}';
  344.   IID_IExchExtPropertySheets: TGUID =     '{00020D17-0000-0000-C000-000000000046}';
  345.   IID_IExchExtAdvancedCriteria: TGUID =   '{00020D18-0000-0000-C000-000000000046}';
  346.   IID_IExchExtModeless: TGUID =           '{00020D19-0000-0000-C000-000000000046}';
  347.   IID_IExchExtModelessCallback: TGUID =   '{00020D1A-0000-0000-C000-000000000046}';
  348.  
  349.  
  350. (*
  351.  *  C M D I D s
  352.  *)
  353.  
  354.   // File
  355.  
  356. const
  357.   EECMDID_File = 10;
  358.   EECMDID_FileOpen = 11;
  359.   EECMDID_FileSend = 12;
  360.   EECMDID_FileSave = 13;
  361.   EECMDID_FileSaveAs = 14;
  362.   EECMDID_FileMove = 16;
  363.   EECMDID_FileCopy = 17;
  364.   EECMDID_FilePrint = 25;
  365.   EECMDID_FileNewEntry = 18;
  366.   EECMDID_FileNewMessage = 19;
  367.   EECMDID_FileNewFolder = 20;
  368.   EECMDID_FileAddToPAB = 29;
  369.   EECMDID_FileDelete = 21;
  370.   EECMDID_FileRename = 22;
  371.   EECMDID_FileProperties = 23;
  372.   EECMDID_FilePropertiesRecipients = 24;
  373.   EECMDID_FileClose = 30;
  374.   EECMDID_FileExit = 32;
  375.   EECMDID_FileExitAndLogOff = 33;
  376.     // Edit
  377.   EECMDID_Edit = 40;
  378.   EECMDID_EditUndo = 41;
  379.   EECMDID_EditCut = 42;
  380.   EECMDID_EditCopy = 43;
  381.   EECMDID_EditPaste = 44;
  382.   EECMDID_EditPasteSpecial = 45;
  383.   EECMDID_EditSelectAll = 46;
  384.   EECMDID_EditMarkAsRead = 49;
  385.   EECMDID_EditMarkAsUnread = 50;
  386.   EECMDID_EditMarkToRetrieve = 52;
  387.   EECMDID_EditMarkToRetrieveACopy = 53;
  388.   EECMDID_EditMarkToDelete = 54;
  389.   EECMDID_EditUnmarkAll = 55;
  390.   EECMDID_EditFind = 56;
  391.   EECMDID_EditReplace = 57;
  392.   EECMDID_EditLinks = 59;
  393.   EECMDID_EditObject = 60;
  394.   EECMDID_EditObjectConvert = 61;
  395.   EECMDID_EditFullShape = 62;
  396.   EECMDID_EditHiraKataAlpha = 63;
  397.   EECMDID_EditHangAlpha = 64;
  398.   EECMDID_EditHanja = 65;
  399.   EECMDID_EditRoman = 66;
  400.   EECMDID_EditCode = 67;
  401.  
  402.  
  403.   // View
  404.  
  405. const
  406.   EECMDID_View = 70;
  407.   EECMDID_ViewFolders = 71;
  408.   EECMDID_ViewToolbar = 72;
  409.   EECMDID_ViewFormattingToolbar = 73;
  410.   EECMDID_ViewStatusBar = 74;
  411.   EECMDID_ViewNewWindow = 75;
  412.   EECMDID_ViewColumns = 79;
  413.   EECMDID_ViewSort = 78;
  414.   EECMDID_ViewFilter = 80;
  415.   EECMDID_ViewBccBox = 91;
  416.   EECMDID_ViewPrevious = 87;
  417.   EECMDID_ViewNext = 88;
  418.   EECMDID_ViewWritingMode = 89;
  419.   EECMDID_ViewImeStatus = 94;
  420.  
  421.  
  422. // Insert
  423. const
  424.   EECMDID_Insert = 100;
  425.   EECMDID_InsertFile = 101;
  426.   EECMDID_InsertMessage = 102;
  427.   EECMDID_InsertObject = 103;
  428.   EECMDID_InsertInkObject = 104;
  429.  
  430. // Format
  431. const
  432.   EECMDID_Format = 110;
  433.   EECMDID_FormatFont = 111;
  434.   EECMDID_FormatParagraph = 112;
  435.  
  436. // Tools
  437. const
  438.   EECMDID_Tools = 120;
  439.   EECMDID_ToolsDeliverNowUsing = 121;
  440.   EECMDID_ToolsDeliverNow = 122;
  441.   EECMDID_ToolsSpelling = 131;
  442.   EECMDID_ToolsAddressBook = 123;
  443.   EECMDID_ToolsCheckNames = 133;
  444.   EECMDID_ToolsFind = 124;
  445.   EECMDID_ToolsConnect = 126;
  446.   EECMDID_ToolsUpdateHeaders = 127;
  447.   EECMDID_ToolsTransferMail = 128;
  448.   EECMDID_ToolsDisconnect = 129;
  449.   EECMDID_ToolsRemoteMail = 130;
  450.   EECMDID_ToolsCustomizeToolbar = 134;
  451.   EECMDID_ToolsServices = 135;
  452.   EECMDID_ToolsOptions = 136;
  453.   EECMDID_ToolsWordRegistration = 137;
  454.  
  455.  
  456. // Compose
  457. const
  458.   EECMDID_Compose = 150;
  459.   EECMDID_ComposeNewMessage = 151;
  460.   EECMDID_ComposeReplyToSender = 154;
  461.   EECMDID_ComposeReplyToAll = 155;
  462.   EECMDID_ComposeForward = 156;
  463.  
  464.     // Help
  465.   EECMDID_Help = 160;
  466.   EECMDID_HelpMicrosoftExchangeHelpTopics = 161;
  467.   EECMDID_HelpAboutMicrosoftExchange = 162;
  468.  
  469.     // Header
  470.   EECMDID_CtxHeader = 203;
  471.   EECMDID_CtxHeaderSortAscending = 204;
  472.   EECMDID_CtxHeaderSortDescending = 205;
  473.  
  474.     // In Folder
  475.   EECMDID_CtxInFolder = 206;
  476.   EECMDID_CtxInFolderChoose = 207;
  477.  
  478.     // Container
  479.   EECMDID_CtxContainer = 208;
  480.   EECMDID_CtxContainerProperties = 209;
  481.  
  482.     // Standard Toolbar
  483.   EECMDID_Toolbar = 220;
  484.   EECMDID_ToolbarPrint = 221;
  485.   EECMDID_ToolbarReadReceipt = 222;
  486.   EECMDID_ToolbarImportanceHigh = 223;
  487.   EECMDID_ToolbarImportanceLow = 224;
  488.   EECMDID_ToolbarFolderList = 225;
  489.   EECMDID_ToolbarOpenParent = 226;
  490.   EECMDID_ToolbarInbox = 76;
  491.   EECMDID_ToolbarOutbox = 77;
  492.     // Formatting Toolbar
  493.   EECMDID_Formatting = 230;
  494.   EECMDID_FormattingFont = 231;
  495.   EECMDID_FormattingSize = 232;
  496.   EECMDID_FormattingColor = 233;
  497.   EECMDID_FormattingColorAuto = 234;
  498.   EECMDID_FormattingColor1 = 235;
  499.   EECMDID_FormattingColor2 = 236;
  500.   EECMDID_FormattingColor3 = 237;
  501.   EECMDID_FormattingColor4 = 238;
  502.   EECMDID_FormattingColor5 = 239;
  503.   EECMDID_FormattingColor6 = 240;
  504.   EECMDID_FormattingColor7 = 241;
  505.   EECMDID_FormattingColor8 = 242;
  506.   EECMDID_FormattingColor9 = 243;
  507.   EECMDID_FormattingColor10 = 244;
  508.   EECMDID_FormattingColor11 = 245;
  509.   EECMDID_FormattingColor12 = 246;
  510.   EECMDID_FormattingColor13 = 247;
  511.   EECMDID_FormattingColor14 = 248;
  512.   EECMDID_FormattingColor15 = 249;
  513.   EECMDID_FormattingColor16 = 250;
  514.   EECMDID_FormattingBold = 251;
  515.   EECMDID_FormattingItalic = 252;
  516.   EECMDID_FormattingUnderline = 253;
  517.   EECMDID_FormattingBullets = 254;
  518.   EECMDID_FormattingDecreaseIndent = 255;
  519.   EECMDID_FormattingIncreaseIndent = 256;
  520.   EECMDID_FormattingLeft = 257;
  521.   EECMDID_FormattingCenter = 258;
  522.   EECMDID_FormattingRight = 259;
  523.     // Note accelerators
  524.   EECMDID_Accel = 270;
  525.   EECMDID_AccelFont = 271;
  526.   EECMDID_AccelSize = 272;
  527.   EECMDID_AccelSizePlus1 = 273;
  528.   EECMDID_AccelSizeMinus1 = 274;
  529.   EECMDID_AccelBold = 275;
  530.   EECMDID_AccelItalic = 276;
  531.   EECMDID_AccelUnderline = 277;
  532.   EECMDID_AccelLeft = 278;
  533.   EECMDID_AccelCenter = 279;
  534.   EECMDID_AccelRight = 280;
  535.   EECMDID_AccelBullets = 281;
  536.   EECMDID_AccelNoFormatting = 282;
  537.   EECMDID_AccelRepeatFind = 283;
  538.   EECMDID_AccelContextHelp = 284;
  539.   EECMDID_AccelNextWindow = 285;
  540.   EECMDID_AccelPrevWindow = 286;
  541.   EECMDID_AccelCtrlTab = 287;
  542.   EECMDID_AccelUndo = 288;
  543.   EECMDID_AccelCut = 289;
  544.   EECMDID_AccelCopy = 290;
  545.   EECMDID_AccelPaste = 291;
  546.   EECMDID_AccelSubject = 292;
  547.   EECMDID_AccelContextHelpOff = 293;
  548.   EECMDID_AccelDecreaseIndent = 294;
  549.   EECMDID_AccelIncreaseIndent = 295;
  550.   EECMDID_AccelColor = 296;
  551.     // Edit.Object
  552.   EECMDID_ObjectMin = 300;
  553.   EECMDID_ObjectMax = 399;
  554.     // Tools.Remote Mail
  555.   EECMDID_RemoteMailMin = 600;
  556.   EECMDID_RemoteMailMax = 699;
  557.     // Tools.Deliver Now Using
  558.   EECMDID_DeliverNowUsingMin = 700;
  559.   EECMDID_DeliverNowUsingMax = 799;
  560.     // Form verbs
  561.   EECMDID_FormVerbMin = 800;
  562.   EECMDID_FormVerbMax = 899;
  563.     // For backward compatibility with earlier header versions
  564.   EECMDID_ViewInbox = EECMDID_ToolbarInbox;
  565.   EECMDID_ViewOutbox = EECMDID_ToolbarOutbox;
  566.   EECMDID_ViewItemAbove = EECMDID_ViewPrevious;
  567.   EECMDID_ViewItemBelow = EECMDID_ViewNext;
  568.   EECMDID_ToolsFindItem = EECMDID_ToolsFind;
  569.   EECMDID_HelpUsersGuideContents = EECMDID_HelpMicrosoftExchangeHelpTopics;
  570.   EECMDID_HelpAbout = EECMDID_HelpAboutMicrosoftExchange;
  571.  
  572.  
  573. implementation
  574.  
  575. end.
  576.